home *** CD-ROM | disk | FTP | other *** search
/ Mesolore / Mesolore - Disc 1.iso / pc / data / Selden Search.dir / 00021_Script_21 < prev    next >
Text File  |  2001-03-05  |  499b  |  22 lines
  1. on MouseDown
  2.   btnDown
  3. end
  4. on mouseUp
  5.   btnUp
  6. --    put "" into field "output"
  7.   put "" into temp
  8.   DropListData = ""
  9.   DropListData = sendAllSprites (#DropList_Selection, [:])
  10.   repeat with x in DropListData
  11.     set holder = the text of x
  12.     if holder <> "" then
  13.       repeat while the last char of holder = " "
  14.         delete the last char of holder
  15.       end repeat
  16.       put holder &  "," after temp
  17.     end if
  18.   end repeat
  19.   delete the last char of temp
  20.   search temp
  21.  
  22. end